home *** CD-ROM | disk | FTP | other *** search
/ MacHack 1996 / MacHack 1996.toast / Hacks / Hacks ’95 / Is Native / MyHideWindow.c < prev   
Encoding:
Text File  |  1995-06-24  |  435 b   |  26 lines  |  [TEXT/KAHL]
  1. //
  2. // File:    MyHideWindow.c
  3. // Project:    IsNative.π
  4. // Author:    Glenn L. Austin
  5. //            Symantec Corporation
  6. //
  7. #include <Traps.h>
  8. #include "IsNative.h"
  9.  
  10. WindowPtr    aboutWindow;
  11. void*        oldHideWindowTrap;
  12.  
  13. pascal void MyHideWindow(WindowPtr theWindow)
  14. {
  15.     long    oldA4 = SetA4World();
  16.     
  17.     if (theWindow == aboutWindow)
  18.     {
  19.         SetToolTrapAddress(oldHideWindowTrap, _HideWindow);
  20.         StopAnimation();
  21.         aboutWindow = nil;
  22.     }
  23.     
  24.     RestoreA4World(oldA4);
  25. }
  26.